home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha Extra 2004 January / CyberMycha Extra 1-2004 (Poland) (Disc 2).bin / Pippi / common.cst / 00018_buttonLowerHelpGM.ls < prev    next >
Encoding:
Text File  |  2001-09-04  |  747 b   |  36 lines

  1. property meNum, myName, meSprite, meMember, meHmember, mePmember
  2. global monkey
  3.  
  4. on beginSprite me
  5.   meNum = me.spriteNum - 144
  6.   meSprite = sprite(me.spriteNum)
  7.   meMember = meSprite.member
  8.   myName = meSprite.member.name
  9.   meHmember = member(myName&"h", 2)
  10.   mePmember = member(myName&"p", 2)
  11. end
  12.  
  13. on mouseEnter me
  14.   meSprite.member = meHmember
  15. --  updateStage
  16. end
  17.  
  18. on mouseLeave me
  19.   meSprite.member = meMember
  20. --  updateStage
  21. end
  22.  
  23. on mouseUp me
  24.   monkey.callFromDownButton(meNum, meSprite) -- skicka kommando till ap-scriptet
  25. end
  26.  
  27. on GoScript me --g├Ñ, kommandot kommer fr├Ñn ap-scriptet
  28.   monkey.reCoverMe()
  29.   monkey.meSprite.butNum = 0
  30.   if sound(2).member <> member("introSnd", 1) then
  31.     sound(2).play(member("helpSnd", 1))
  32.   end if
  33. end
  34.  
  35.  
  36.